mt7Jr-b*yh 


^ t — b y > b 

mm 

0 IJ 

BEEP 

BEEP UT -y 7 ) 

a—#<b 

BEEP 

BEEP 1 

ERROR 

ERROR 3 - K 
x 7 — Cr '> 5 n. U — b 

tS. ON ERROR G 
OTOiffl^tTttffl. 

ERROR 12 

KEY 

keyIJ 

7 7 >^'> 3 > • T — £ TtH 

f *. 

K E Y 1 , "W 1 D T 
H 80 , 25 " + CHR$ 
( 13 ) 

MOTOR 

MOTOR ( 7 T 7 f] 

1 * 1 / 81 ( 7 ) IJ U-©* 0 W£T*. 

MOTOR 

MOTOR 0 

0 N ERROR 
GOTO 

ON ERROR GOTO 

*T#-t 

X -7 — #^S # tz £ # (7) v -V > 

ON ERROR G 
OTO 1000 

ON ERROR G 
OTO 0 

T R 0 F F 

T R 0 FF 

TROFF 

T RON 

TRON 

Y KCttl'S. 

TRON 

RESUME 

RESUME ( 0 i/:(iNE 
XTI 

X y — JBSSLfcfr# 

■b / P ^ 7 A cF it &. 

RESUME 
RESUME 100 
RESUME NEX 
T 



COLOR, LINE, PSET 4 'mfflt?. 7 MJt:'a-K 

* 7 —■=£—K 

3 - K Itsl 3 - K 

0 /-vju 0 m 

I y-^U7 h I ff 


2 

7' l J > ? 

2 


3 

'> — ? \s"J h 

3 

m 

4 

') /<—7 

4 

m 

5 


5 

'>7 > 

6 


6 

m 

7 

U>y h 

7 



PRINT USING 

CD^-ywSlgJg 

PRINT US I NG^fclJ PRINTtn USING, LPRI 

NT US I NG4’mt^liWfc«)W7 *-V*y b£££< Z £ # 

Tiir. 


e* 


li^(7)^J 

# 

(«»«) 

#### 


'J^^(7MiS 

##. ### 

+ 

*k«©*«i*fctt*acjEm 

+ # # 


(7)l£-§- "O (7 •& 

##. ## + 

- 

mnttz u 

-#. # 



###- 

* * 


* * #. ## 

¥ ¥ 

afjs©a^tcnia a a p^^. 

¥¥##. # 

* * ¥ 

aa©*«i tc niB^ l , 

4' A'(Z7i £ 

#tz, ^8U(Z±1^^. 

**¥###- 

, 





**¥##, ### 


1 ^©<5^. 

< 

< 

< 

< 

4+ 

4* 

4* 

/ 

35:^5lj(7)7°'J > b(7)li^, £ 
15J© 1 £:££tt£Wa. 

/ 

& n I® (7) 

n + 2i®©^S.^^^). 

& & 


mmmm 


m$k 

mt 

«0 

ABS(x) 

x 

Y = A B S (A + B) 

ATN(x) 

x ( 7 ) 7 -^ ^ >y I > h (7 
'/ 7 » 

PRINT A T N 
A /360 * 6 . 28 ) 

CDBL(x) 


A = CDBL(Y) 

CINT(x) 

x fcsmMO* 

B = C 1 N T ( B) 

COS(x) 

x( 7 ) 3-y--<> (x (i7y7>) 

A = CO S(2.3) 

CSNG(x) 

x 

C = CSNG(X+ 2 ) 

EXP(x) 

e ( 7 ) x ^ 

B = E X P(C) 

FI X( x) 

^r-bTJ OttTfcHa 

J = F 1 X( A/B) 

INT(x) 

x £^x.4U'll:*:(7)!£a. 

C = 1 N T(X) 

LOG(x) 

x©i»^a^^iL*. 

D = L O G ( Y —2 ) 

RND(n) 

n > 0 (DU ^ii^(7)gLa. 

n<0©^#SLa^5lJ^r!Elff. 
n = 0(7)£ ^lULSLa 

E = R N D ( 1 ) 

SGN(x) 

x > 0 ( 7 )£ # SGN( x) = 1 
x< 0 ( 7 )tSSGN(x )=-1 
x = 0 < 7 )^#SGN( x)= 0 

B = SGN(X + Y) 

SIN(x) 

X © It < >. x(i 7 vy> 

S = S 1 N(A) 

SQR(x) 

X 

C = SQR(D) 

TAN(x) 

X © ^ > V 5 x > b 

D = T A N ( 3 . 14 ) 

ms mm 

m 

ASC(s) 

3 C^ 5 IJ s ©S 15 )©^© □ - 
K i>. 

PR 1 NT ASC ( 
A $ ) 


CHR$(x) 

3 -Kx 

X.^). ASCW®. 

PRINT CHRS 
( 48 ) 

HEX$(x) 

afiix©i 6 ii^ 5 i. 

H$ =H E X$ ( 25 ) 

1 NKEY$ 

(x) 

+ — /T'— K^'ib-^X. *0 tl/i x 

X$ = 1 N KEYS ( 3 ) 

1 NPUTS 

(*[.[#]]) 

7 tT 7 L' (#fn) *'«b-^X. 
btl/i x >J. 

X$ = 1 N PUTS ( 
5 , # 1 ) 

INSTR s 1 <T>*b'h s 2 

([x f ] si, s 2 ) aaja&^fcaiL. 

495 ©]J 

INSTR (AS , * 

M" ) 

1 NSTR ( 3 , AS 
, B $ ) 

LEFTS 

(s, x) 

s ©+©^*'»b x i x* 

© 3 SC^ 5 IJ. 

B$ =LE FT$ (X$ 

, 5 ) 

LEN(s) 


K = LEN("BAS 1 

C") 

M 1 D $ 

( s, x, y) 

s © 4 l ©^t)' l b x 7 )'ib 

tei »J. y © 5 C^ 5 U. 

AS =M 1 D$(X$ , 

5 , 10 ) 


s ( 7 ) 4 *© x ^ 

y 7 ^©(U?rt?>. 

M 1 D$ ( AS , 3 , 2 ) 

= * T O " 

OCT$ ( x) 

x© 8 it^H?r-r?) 7 :^ 5 IJ^ 

AS =OCT$(&H 
FF) 

RIGHTS 

(s, x) 

s © + ©^A' «b x 5 C^^© 3 SC 

3W***jL*. 

C$=R 1 GHT$ ( 
X$ , A + 1 ) 

SPACES 

(x) 

x^®©^fi?r-^x.^. 

AS =S$ +S PAC 

E$ ( 20 ) + V 

STR$(x) 

afSx^r, 

PRINT STRS 

( 35 ) +"R" 

STRINGS. 

( x, sifcdy) 

shX^( VMLtzX^ 
^IJ^r^X.?>. 

G $ =" G" + S T R 1 
NGS ( 2 , 0 )+"D" 


3 — K y ©^C^ X HO < U il 

Y$ =STR 1 NGS 
( 100 , 42 ) 

VAL(s) 


A = 5 +V A L(" 2 ") 


T*-r 3 ^ 7 H« 



mm 

^ij 

CVD(s) 

8 /\'T h©^ 5 lj^fgffl«© 
afii^sca. 

A = CVD(A$ ) 

C V 1 ( s) 

2/w vcn-x^t ij^na©a 

B = C V 1 (X$ ) 

CVS(s) 

4 'W b©^ 5 lJ^^fl|Jt© 

aa^sia 

C = C VS(Y$ ) 

DS K 1 $ 

( x, y , z ) 


AS =DS K 1 $ (H, 

1 , J) 

EOF(n) 

V—X>'> T 7 U • 7 TT 7 U ( 
Hn) ©»*J «r^r. 

PRINT EOF( 1 ) 

FPOS(n) 

#■§■ 

PR 1 NT FPOS 

( 1 ) 

LOC(n) 

7 >^A 7 rT 7 U©i: #, ^ 
©L 3 —K#^ - , v—X>v . 

# L/i-tr 7 ^ a. 

A = L O C( 2 ) 

LOF( n) 

7 > 7 *A • 7 ?^ 7 UT% 
T©i*©U 3 - K#-t 

B = L O F( 3 ) 

MKDS ( x) 

fgWJfafilx * 8 'W b© 7 : 

PRINT MKDS 

( 123456789012 ) 

MK 1 $ ( x) 

5 iax £ 2 'W h© 5 C^ 5 U- 

xa. 

PRINT MK 1 $ 

(A) 

MKS$(x) 

fffl^ax *- 4 /« h© 7 :^ 

jo 

PRINT MKSS 

(A) 


^©^©Ha 


ij>—/\vtz—S' 


fma 

mm 

0 IJ 


ERR i 7 -/ 7fr-i> 

u-K 

■G* 

C S R L 1 N 

@®_L© t) — 7 7U©|^fiS. 

A = C S R L 

1 N S 

1 

NEXT without FOR 

F O R - N E X T AfjE L < Mfo L X v'£ 






v». (NEXTA'-jbtyS) 

DATES 

F*9/81©7 □ «y 7CJ: S0#. 

PR 1 NTDATES 

2 

Syntax error 

X&Wt ^^o-Cv'4. zTvT'y^lZ 







IT4 l<r> xr- b / > b l < 7 M)'h h . 

ERL 

x 7 —#13# tzt: $ ©ff#-§\ 

E = E R L 


3 

RETURN without GOSUB 

GO SUB-RETURN W&. L < Wlc? 

ERR 

x^-^©P- K ^r^x.^. 

PRINT 

ERR 



L-Cv«i-v». (RETURN Aflt £*#>h ) 





4 

Out of Data 

READ jCX'tfit 7— /A‘DA 

FRE(x) 

3.—**f—ffl7 X 'J x >J 7©^ 

PRINT 

F R E( 0 ) 





xli7 'S-. 



5 

Illegal function call 

XT - b / > hi] { 

INP(x) 

I/O7 Kl/7 x ©j}' : — h A'<b 

A = 1 N P ( 32 ) 





It!<^& A/ 1_ x — 7 coM. 



6 

Over flow 

K )) ? i L /i & fA^iK n M 5R ? i l * 

*SI>H*frWi-Cv.&. 

LPOS(x) 

-/') >7©/U > b K© 

F = L P O S( 3 ) 




<iS. x(i 7 's-. 



7 

Out of memory 

7 t')W tt* f ft ') Cl- < i- o fz . ( 70 r 

TAA'tf+S'S. fidfl|A c A:#1 -¥**) 

PEEK(x) 

^ u © x #tfe©F*g^. 

A = P E E K (51 2 ) 

8 

Undefined line number 

t?ilSYor 7 AlT ( G O T O <r> 


®®_b©( x, y) ©<±S(Z K 





fctXfcfri') iMi'JIJnti'tv.. 

POINT 

PRINT 

PO 1 N 



(x, y) 

*y h#A^#^-)#© 4aj$. 

T ( 0 , 0 ) 


9 

Subscript out of range 

'fe ft <0 aS'r-** «Hfl MU 4* V». 

POS(x) 

®®±©ti — x 


POS ( 

10 

Redimensioned array 

(fsJLDI 

PRINT 





0 ), C S R L 

1 N 







11 

Division by zero 

01 : cfc &fflW*‘‘JI[ff#nfc. 

SPC(x) 

PR 1 NT^Xfffi L, x 

PRINT 

S P C( 5 ) 

12 

Illegal direct 

ffu/b•XT-b/>btLtfi 

TAB(x) 

PR 1 NT£*Tm\ 

PRINT 

T A B( 20 ) 

13 

Type mismatch 

^ * *4 i'T'A<7)53 v -■-» LTV' 
4-v». (ftfi&.t x b y > ri-ar) 

T 1 MES 

rt»©7 3-y7icJ:%«FSIJ. 

PRINT TIMES 

14 

Out of string space 

CLEARtii'tMlL Xb'J> 







1 ') x y 7 * f £ y 4 * < iro tz . 

USRn (x) 

3 .— L tz n # g © 

PRINT 

USR ( 



xb')> / (>J|ifln : T'fflifL/:*^ : ?iJ) 

7 // 157 U — x 

&27000 ) 

15 

String too long 


tt§ia. 




( 2 5 5 tt-KLL) 





16 

String formura too complex 

£T- A*‘by 8£T y * . ( » y 3 <r> * x t 

V A R PT R 

5:a©tij-^T'bnTi'^7 k 

J=VARPTR(J) 



(xa«) 






C O N T 3 t> K* A 7JLT IfccIrT'^ 



17 

Can't continue 



Ci-v». (.-K<>^* f fifiia?KTv'?>) 





18 

Undefined usr function 

1 f-IWft^Vii* (DEF 




19 No RESUME 

20 RESUME without error 

21 Unprintable error 

22 Missing operand 

23 Line buffer overflow 

24 Position not on Screen 

25 Bad File Data 

26 Disk BASIC Feature 

27 Communications Buffer overflow 

28 Port not initialized 

29 Tape read ERROR 

f^^BASI Cc7)ffefV«Oi7- 

50 Field overflow 

51 Internal error 

52 Bad file number 

53 File not found 

54 Bad file mode 

55 File already open 

57 Disk I/O error 

58 File already exists 

61 Disk Full 


-X 7 - 44 iIf*, t*d /7 A«o*JS£lf *: WISH 
tzztw c#4*v». 

x7-i RES UMEL T v' & v». 
( X7-i { iH'COi:RESUMEL/:.) 
/ 17-. 

x-f-b y > b t 

BAS I C/) ( , tr£A/JT*®, ~tr*> 
flffi?Lfc> 7 -/UVf> 7 .S 4 £ 6 ‘. Aiffi ^ 
hi; 

oTi‘4. 

7 4 X flTv'frv'i T'-f 

B A s I CnfobZ'MfrLk. 

ffliUm* 7 tj>< 

T—><-7o-Lft. 

-f > *7i 4 xffleoLSI <o«ffcsi5E* f 

^7 b»*^«o^73/»‘iEL < fttchtlX 
V'fcv*. (t- 7V>J*ABU >)4f) 


F I ELD*T\ 128 *<4 
*«•> STfc. 

B A S I Crtffitm7- 
T-r>?HTi'4H'7 T 4'L • 

LOAD, KILL. OPEN 4 4"C, 
ffftLii‘7rO^T7-t^Lt. 

x —7r^K'OPENL 
fc7r^H:WLT, 

XfcLfc. 

1-T'LU«*‘fL-0'4 7T 4 /H:MLtO 
PEN^K I LLt*(TL'fc. 

f'4 X ?U '1 — K • 7 4 b X?—j&«feL 
«*itlT t«HEf *4 < 4*»fc. 

NAMEtUJ:or««?*l/:7T^k 

♦— ikW, 

Ti x? 


(Tl X 9 <r> 4v>>«fr(ix7-26,21£4*) 


62 Input past end 

63 Bad record number 

64 Bad file name 

66 Direct statement in file 

67 Too many files 


7rf n,(n-f'<X<r>7'— 7 iHt&f&LTz 
fcU, I N PUT**«SIHt 

PUT, GETtf, k3-P*+>'< 
— A f 0~ 32767^) 16141U 4*V'. 

TilSC-7T 4 

T x * — - 7t —7“ •/ b T-«o LOADt 
II 74 u 7 b • xr — b y > b 

255«SW±*>7t 4 **«*•) HJLfc. 


□ -K* 


_L<4 4 t*-y b- 


/ 

0 

1 

2 

3 

4 

5 

6 

7 a 

9 

A 

B 

c 

D 

E 

F 

O 


Be 


0 

@ 

P 


p 

JL 


— 


; 

— 

X 

1 

Sh 

Di 

T 

1 

A 

Q 

a 

q u 

B -p 

0 

T 

jf 

A 


2 

n 

2 

Sx 

D 2 

IT 

2 

B 

R 

T 

r u 

a J 

F - 

T 

/ 

y 

“ 

z 


3 

EX 

d 3 

T 

3 

c 

S 

c 

s B 

, 1 - 

j 

7 

T 


= 



4 


d 4 

$ 

4 

D 

T 

T 

11 

l _ 


JL 

K 

A 

A 

B 

5 

Eq 

Nk 

% 

5 

E 

U 

e 

Is 

I— 


T 


JL 

m 

1 # 

6 

a K 

Sn 

A 

6 

F 

V 

f 

V 


T 


X-. 

3 

■ft 

7 

Bl 

Eb 

f 

J 

G 

W 

g 

w 


T 


% 

7 

w 



B S 

Cn 

T 

8 

H 

X 

h 

X 

p- 



J\ 

u 

* 


9 

h t 



9 

J 

x 

i 

z 

- 

1 7 

j/ 


)V 

¥ 



Lf 

Sb 

* 


J 

z 

j 

z 


JL 

0 

/ N 

V 

♦ 


B 

Hm 

Ec 


> 

K 

I 

K 

T 

- 

t 

P 

b 

o 

* 


C 


-» 


J< 

L 

¥ 

J 

1 

vy 

ZL 

/ 

J 7 

V 

• 



C R 

z 

— 

= 

A 

1 

m 

1 . 

T * 

j x 

X 

-N 

/ 

0 


E 

So 

T 



N 


n 

~ 


3 

-fe 

A 


7 


JF 


i 

z 

? 

O 

— 



hp 

|jy 


"7 

0 

N, 

_ 


©copyright 1979 Nippon Electric Co., Ltd. 78032461 





& : ^T-EpJ&lJ#ftTl'£ *>©1*7* 4 7 7 
B A S 1 C©3 7> KT*T. 


I EM-688 
September -1978 


y 77 u>x 








*—K 


0 ^ 'll Si Tfti 


PC800I 


N-B A S I C 



























































































(©(iZJ > h 

©B 

A-VJl'* 1 11 g Z'tizx^tbt. 

©C 

7°P ^7A£7)H^T^4iil : L T, 3-7>K^E— 
dr*. iis-iis t op+-) 

©E 

X-VJlstiLWlJ'b&ZkZ 

©G 

7ir-**Mbt. 

©H 

1 

© 1 

$7. ^77hy7li8 i)7A:L 

©J 

*-7 7UUZ(^£7)^^:A£7)^f Li^l* . 

©K 

*-A. *-V;U«:*JbLMt. 

©L 

U 7t* . 

©N 

1 iis :'d:i:^fbt. 

©R 

1 A. 

& O Z tz it & 


& H 


? (£Mft) 

P R 1 N T £ IrI l;. (tzt~ L L ? IJLPR 1 NT t 
LTff/AV ) 

' (7t:xhP7j 

R E M i: ID U . 

. (tf U* K) 

51^£7)^T#-§-$r^T. 

: (3P>) 

7^777- Y h£7)^-^(7)E-t7]0 !£-§-. 

; (-tz $ 3 p >) 

PR 1 N T3t+T'<7)E-»S0i)Se-^. 


5SJ s* 

W5& 




E# 

§y 




$ 

h ') 

3 - K b* 0 — 255 £7)5C^ 

3 +^£7)3$C^^ 


% 


-32768 -32767 £7)^^ 

2 


/ ^L«Jt 

7.1 ^£7);?»)/J^ 

4 


# 15«J£ 

I6.8«j£7)^®]/J^ 

8 


\ 





~*<a4. '•. 

— .Vi. . . •■ 

■ Tl M 


A 











mm 


3V> K 

mm 

« 

= 

ftAi tzitmmwz 





— 

n.ammitzttig.M- 


AUTO 

AUTOCCMttfirM). ^t# 

AUTO 10, 10 

+ 

tam tzitttf ijot»S& 



^cr>r*m) ) 


* 

** 



i ®)ftL*TMfcf££-f *. 


/ 






A 



C LO A D 

C LO A D "7T"f7U^" 

CLOAD "A" 

¥ 




^j-fe.y |'7-^'ib7a^7 


MOD 

»=fe OBSltSSt) 



A fc P — K t * . 
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NOT 

saiiftit 2 w?i» (t$ai*sft) 
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AND 
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CONT 

CONT 

CONT 
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DELETE 40 
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DELETE -40 
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MOUNT 
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x-r t. 0 

MOUNT 1 

NAME 

NAME "IB 77 i 7U£" A 

S "|/f 77i 7U£" 

7 7'f7U^^3!!Et*. 

NAME "OLD" 
AS "NEW" 

N EW 

NEW 

t^t£7)^H($r^lj7t*. 

N EW 

RENUM 
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7ny7A(7)'n&^t:$fT L < 
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RENUM 

RENUM 300,, 50 
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RUN 

RUN 50 
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SET 1, "R" 
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- $ *;u^e- KL^* . 

TERM A, 0,1,1 


(AtH*. #5fc*x-Hil$< ) 


37>F 

mm 

0|J 

CLEAR 

CLEAR ( 

£*). y^E'JJiffi) 

0 Z tzltgGizfijT’ 
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DE FST R 
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END 
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ERASEEai*(.Efl|Jg-) 
E5IJ 4-»>St*. 

ERASE A, B$ 

FIELD 

FIELD (#) 77i^§ 

f:^ASm» 

7>7A77i ;u/<*y 7 7 4* 
LSe»<7)^«rtlJ^T*. 

FIELD 1 , 20 

AS M$, 25 AS 
X$, 9 AS A $ 

FOR 

FOR^ = 5t TO st 
[STEP 5 *) 
NEXTJT*w;u-7^^4 
CtoT < OJST. 

FOR J = 0 TO 

1000 STEP 2 


G OS U B 

GOTO 

I F 

LET 

LSET 

NEXT 

ON- 
GO S U B 

ON- 

GOTO 

READ 

REM 

RESTORE 

RETURN 


GOSUB GOSUB 2000 

ft’fcZtitz'ffij'btei zy-7 
>~7’t * . 

GOTO GOTO 10 


IF 5* THEN XJfc 
(ifrM (ELSE *2 
/zlifrMO 

^Wjf*»tfTHENfl) 
dT £7) op ^ , l&frFjl^EL 


I F X > Y THE 
N A = Y ELSE 
A = X 


LET = LET A = 5 

Mkl-ttfcftA* *. B = 0 


LSET fl^ = 5C^5IJ LSET A $ = "G 

PUT^L5fe/- J t>, 7 >^A OOD* 

r-*'<'-y77UtilfR*a*. 


NEXT ( ;u-7 , £&(,7U-y NEXT J 
£»-)) 

F 0 R;u —7(7)1511] * . 


ON st GOSUB fr# 

C, fr#-§---0 

5tc7)fI(Z^LT, *i=i$T* 
if f- > £ 3 - jut * . 


ON J- 1 GOS 
UB 100,300,500,99 
0 


ON 5 t GOTO *tM ON X*Y GOT 
stttfcliJfcCT, *S^t*fr 0 5,300, 50 

M^iw»*»t.. 


READ MkC.Mfc-) READ A, B$ 

DATA5:(7)f-^^m 
—3 if * . 


REM ffifttf)#!?:, £ REM * * * S T A 

y a if =7 A4 , L}£$R&7(f * R T * * * 

fcttl-tiH • REM < 7 )^t (iv 
juf^x- h y > MtT* £ <r 

i'. 


RESTORE (frM) RERTORE 100 

DATA**, «j£Lfcfr# 

■*§•/>' Itc#> * <£ 7 Ut ^ . 

RETURN RETURN 

if 7VU—?■>*'*>, *£7)^7“ 


R SET 


STOP 


SWA P 


ju-f- >^a-;Hf;GOS 

U B£<7):jfc<7)2:^& dT*. 

RSET RSET X$ = "A" 

• A'-y7 7 

STOP STOP 

yn ir^A^n^T^+iiiL, 

7l/-^ • ,X-y-tz-v>£i±|:fj 
LX37> K^e— Ki:t dT* . 

SWAP SEffic SWAP A , B 

2 0(7)Sea<7)filfr!fiE»t4. 


AtBflT.x-hjOb 

37>F SSI 150 

CLOSE CL OSECC#) 7 7-fX'* CLOSE#2 

*C.C#)7*-r^M-) 

7U^(7)AtHf7 

D S K O $ DSKOS K7i7#§ .(> DSKO$ A,B,C 

Hr £ & t." . 


GET GET(#)77'OuM(.L GET# 1 

a-KM) 

7 > ^ A • 7 7 -f 7U />' b~7 > 

*/<y7 7 / N I U- □ — K 
■5f &Sfc^i&C . 


INPUT I NPUT ( 

"0 MfcC.Mk-) 

+—— K*'<bA 2 lT* . 

INPUT# INPUT# 7 7<7UM. 

MH.Mfc-) 

'> — y >*>-** 7U/>' »•> 7 "'— £ £ 

Itc*. SCttCftA**. 

I NPUT # -1 I NPUT #-1 , £:&(,g; 
»-) 

f) -fe-y f A' <b 7 p O ^7 A4>£7) 


INPUT "7=K/ 
x-£ ; N 

I NPUT # 1 , A 


I NPUT#- 1 , A 


SEttHfcfrAat *. 

KILL KILL *7 7-f7U£* 

X^ A^±A'<b770U«r^lJ 

&+*. 

LINE INPUT LINE INPUT ( V 

n> 7 hX* ;)X«tt 

I & a^T 

E-W* - d:fc< A*T*. 


LINE INPUT# LINE INPUT#77 

-f^M. 



LINE INPUT R)1T £ 

$T&* 7 - 


LPRINT LPRINT 5fc(, 

LPRINT *7^-7.yhr ; it(, 
USING 5t"0 

7V>*C:;ttt*PR I NT 

X.(US I NG(7)iit#paj 

OPEN OPEN *77<7U£' (F 

ORE-K) AS(#)77-f 

JUM 

7 7 4 7U *4$ o X (7) At# * £ 

OUT OUTi-:-hS§, T-2 * 

h Mf ■§■ * . 

POKE POKE^^'JSll x-£ 

f^)(T)thZT Kl/XC^L 
Tx-£$r#£&t\ 


PRINT 


PRINT (, Ztzlt ; Ztz 

y-f 

1**. 


PRINT USING *7 

*—*7 *y h ;£* ( ; it" 1 ; ^-*0 
7*-x-y vxvfctsbbtitz 

®®Llt$R«r 
tfJ***.(US I N G #1) 

PRINT# PR I NT#77'f7U#§, 
[USING "7*-7y h 
5T ;) [. Z tzlt ; $ tz It 

gGZtzli#" 0 


K I LL *N G * 


LINE INPUT 
"NEXT" ;B$ 


LINE INPUT 
# 1. C$ 


LPR I NT A, B 
LPRINT US I 

NG "** #. #^ 
w// ; A, B 


OPEN "ABC" F 
OR INPUT A 
S# 1 


OUT 32,100 


POKE 32768,255 
POKE &H5A0 
0, &HFA 

PR I NT X, X + 
5 ; "ABC" 


PRINT US I N 

G "**¥##. #" ; 

A, B , C 


PR I NT # 1 , A $ 
; * f " ; B $ 


PRINT#-! PRINT#-!, [, Z tz PRINT#-1, A 

(i ; Z. tzlt it-) 

*-tz-y h ^(7)PR I N T 


PUT PUT(#]77i7U#-*§-[, PUT # 1, 5 

3 -KM) 

7>^A77 7 'f7KZ7>^ r A 


WAIT WAIT*'—hM, 77^, WAIT 32, &H55, 

fwil7<-y^ & F 0 

Ai:**— h & =E-$t% . 

7° p ?7 a (7) *<#M t * 

(7)(i[ (x X O R iwil7 -f *y J-) 

AND77^ ] /?'HC7)^ ^ . 


T.C’u-ry • 7 .x-h^>h 

3 7 > K ffll 

COLOR C 0 L 0 R[ 77 >^'> 3 >) COLOR 2 , 0 , 1 

[, 7 7 U+-\» 7^^3 — K] [, 

^?7< -y ^7-r*y^] 

T4 — ^ (ift-fft 

i:(iSH(7)<>: ^<7)«fi|, 

^ <J 7 L f d: £c7)7 7U3 — K, 

i/7 7< *y ( I <7)£ 


CONSOLE CONSOLE [ 7 ^P- 7 U CONSOLE 0 , 

MtSft) C, 25 , 1 , 1 

(,7 7>^ya > + —^*7 

-f -y ^ ( I co <5r ] [, 

f)7-/SlX-f -y ( I £7) 

£ £237-) 3 

77>^y 

a >^r —(7)p*9§:(7)^*, *7 

-/ei^- K(7)»^4-t*. 


- GET® 


GET® (X, Y ) — ( x , y ) 
, K 5 IJC. G] 

mm _L(7)-tt$g l tz g£5ij 

<7) 4 s . 


GET® ( 0 , 0 )— (10 
JO), A 

GET® ( 0 , 0 ) — (20 
, 40 ), A%, G 



G E T@ A (X, Y )— ( x , y ) 

, S£ 5 IJ 

&*>')'<-xmmK 
i-E 5 U 0 > + Ctt*&t\ 

GET @( 0 , 0 ) —( 14 , 14 ) 

, B 

LINE 

L 1 NEftt, 77 ^/a 
>3 — K 

l 'rr& 

tiLT'mm*&%t t>. 

LINE 5,4 


LINE (X, Y )— ( x , y ) 

, ^^ 5 IJ[, 7 7 >5 is a >3 
-KK.BCF)) 

4 S< . 

LINE ( 0 , 0 )— (20 
, 20 ), "V", 2 , B 


L 1 NE (X, Y )— ( x , y ) 

, P(RE)SET(, 7 7 >i> 
'>a> 3 -K) [, B ( F )) 

IS® ( 1^7 7 T ‘V KT* 

LINE ( 0 , 0 ) — (159 
, 99 ), PSET, 2 , B 

LOCATE 

LOCATE Tfc^-liK, 

4 ±$(, f)— V Jl'Z.'f «y ?■) 

-yf-li 0 

LOCATE 3 , 20 , 0 

LOCATE 0 , 0 , 1 

PRESET 

preset (tK¥ 1 ±s, m. 

UliSC, 77 >^va> • 3 

-k (a#(*ttfe<ft') )) 

4 I^L/: 1 i$£ 7 ) K*y f 

PRESET ( 50 , 45 ) 

PS ET 

PSET (tK¥ 14 E, :*iS 4 ± 

SC, 77>^>a> • 3 — K)) 
K-y . 

PSET ( 10 , 10 , 2 ) 
PSET ( 0 , 0 ) 

PUT® 

PUT® (X, Y ) — ( x , y ) 

, K 5 U(,^ 14 ) 

GET® T'fEfifc L f: SC 5 IJ ® 
®±£ 7 )ftS£ 7 )S 6 ^L W*t*. 
^( 7 )^L^ 14 d: LTtffcf)®® 

PUT® ( 0 , 0 ) — ( 15 , 
15 ). A%, G 

P U T@ ( 10 , 10 )— (50 
, 50 ), B %, X O R 


PUT® A (X, Y ) —( x , y ) 

, K 5 IJ 

77 >^ *> a >3 — Kdrdrt 

L GETS A L/: t£ 7 )^r®® 
l-tt*T*. 

PUT® A ( 0 , 0 )- ( 
159 , 99 ), A %o 

WIDTH 

W 1 DTH [ 1 ?t< 7 >*?T»)X. 

1 @®£ 7 )^t^) 

*. 

WIDTH 80 , 25 

















